home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus Special 16
/
AMIGAplus Sonderheft 16 (1998)(ICP)(DE)[!].iso
/
pd
/
anwendungen
/
ispell-3.1.18bin
/
interfaces
/
guispell-1.1
/
libraries.c
< prev
next >
Wrap
C/C++ Source or Header
|
1995-09-21
|
683b
|
34 lines
#pragma msg 148 ignore push
#pragma msg 149 ignore push
#pragma msg 61 ignore push
#include <proto/exec.h>
#pragma msg 149 pop
#pragma msg 61 pop
#define INCLUDE_LIBS_STRUCT
#include "libraries.h"
#include "error.h"
extern char *_ProgramName;
void OpenLibraries (void)
{
int i;
for (i = 0; libs[i].name; i++)
if (!(libs[i].base = OpenLibrary (libs[i].name, libs[i].version)))
Error ("ssssds", _ProgramName, ": Can't open needed library (",
libs[i].name, " version ", libs[i].version, ")!\n");
}
void CloseLibraries (void)
{
int i;
for (i = 0; libs[i].name; i++)
{
if (libs[i].base)
CloseLibrary (libs[i].base);
libs[i].base = 0;
}
}